object Srv_CjcxForm: TSrv_CjcxForm
  Left = 163
  Top = 56
  Width = 616
  Height = 499
  BorderIcons = [biSystemMenu]
  BorderWidth = 3
  Caption = #32771#29983#25104#32489#26597#35810
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -14
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  Position = poMainFormCenter
  Scaled = False
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 14
  object GroupBox1: TGroupBox
    Left = 0
    Top = 0
    Width = 602
    Height = 397
    Align = alClient
    Caption = #25104#32489#26597#35810#65306
    TabOrder = 0
    object dxDBGrid1: TdxDBGrid
      Left = 2
      Top = 16
      Width = 598
      Height = 379
      Bands = <
        item
        end>
      DefaultLayout = True
      HeaderPanelRowCount = 1
      KeyField = #23398#21495
      SummaryGroups = <>
      SummarySeparator = ', '
      Align = alClient
      TabOrder = 0
      DataSource = DataSource1
      Filter.Criteria = {00000000}
      HideSelectionColor = clGreen
      HighlightColor = clGreen
      OptionsView = [edgoBandHeaderWidth, edgoIndicator, edgoRowSelect, edgoUseBitmap]
      object dxDBGrid1Column1: TdxDBGridColumn
        Width = 53
        BandIndex = 0
        RowIndex = 0
        FieldName = #24207#21495
      end
      object dxDBGrid1Column8: TdxDBGridColumn
        Width = 74
        BandIndex = 0
        RowIndex = 0
        FieldName = #32771#28857#20195#30721
      end
      object dxDBGrid1Column2: TdxDBGridMaskColumn
        Width = 60
        BandIndex = 0
        RowIndex = 0
        FieldName = #23398#21495
      end
      object dxDBGrid1Column3: TdxDBGridMaskColumn
        Width = 53
        BandIndex = 0
        RowIndex = 0
        FieldName = #22995#21517
      end
      object dxDBGrid1Column5: TdxDBGridColumn
        Width = 43
        BandIndex = 0
        RowIndex = 0
        FieldName = #25104#32489
      end
      object dxDBGrid1Column4: TdxDBGridMaskColumn
        Width = 65
        BandIndex = 0
        RowIndex = 0
        FieldName = #32771#35797#29366#24577
      end
      object dxDBGrid1Column6: TdxDBGridColumn
        Width = 49
        BandIndex = 0
        RowIndex = 0
        FieldName = #35797#21367#21495
      end
      object dxDBGrid1Column7: TdxDBGridColumn
        Width = 74
        BandIndex = 0
        RowIndex = 0
        FieldName = #32771#35797#20195#30721
      end
      object dxDBGrid1Column9: TdxDBGridColumn
        Width = 88
        BandIndex = 0
        RowIndex = 0
        FieldName = #32771#28857#21517#31216
      end
      object dxDBGrid1Column10: TdxDBGridColumn
        Width = 55
        BandIndex = 0
        RowIndex = 0
        FieldName = #38498#31995
      end
      object dxDBGrid1Column11: TdxDBGridColumn
        Width = 101
        BandIndex = 0
        RowIndex = 0
        FieldName = #19987#19994
      end
      object dxDBGrid1Column12: TdxDBGridColumn
        Width = 92
        BandIndex = 0
        RowIndex = 0
        FieldName = #29677#32423
      end
    end
    object Memo1: TMemo
      Left = 48
      Top = 136
      Width = 249
      Height = 161
      Lines.Strings = (
        'Memo1')
      TabOrder = 1
      Visible = False
      WordWrap = False
    end
  end
  object Panel1: TPanel
    Left = 0
    Top = 397
    Width = 602
    Height = 43
    Align = alBottom
    BevelOuter = bvNone
    TabOrder = 1
    DesignSize = (
      602
      43)
    object BitBtn2: TBitBtn
      Left = 446
      Top = 10
      Width = 75
      Height = 25
      Anchors = [akRight, akBottom]
      Caption = #21047#26032'[&F]'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 0
      OnClick = BitBtn2Click
    end
    object BitBtn3: TBitBtn
      Left = 524
      Top = 10
      Width = 75
      Height = 25
      Anchors = [akRight, akBottom]
      Caption = #36864#20986'[&X]'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 1
      OnClick = BitBtn3Click
    end
    object BitBtn1: TBitBtn
      Left = 168
      Top = 10
      Width = 56
      Height = 25
      Caption = #26597#35810'[&S]'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 2
      OnClick = BitBtn1Click
    end
    object Edit1: TEdit
      Tag = 9999
      Left = 61
      Top = 12
      Width = 101
      Height = 22
      TabOrder = 3
    end
    object ComboBox1: TComboBox
      Tag = 9999
      Left = 4
      Top = 12
      Width = 51
      Height = 22
      ItemHeight = 14
      ItemIndex = 0
      TabOrder = 4
      Text = #23398#21495
      Items.Strings = (
        #23398#21495
        #22995#21517)
    end
    object ExcelBtn: TBitBtn
      Left = 241
      Top = 10
      Width = 100
      Height = 25
      Caption = #23384#20026'Excel'#26684#24335
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 5
      OnClick = ExcelBtnClick
    end
    object TxtBtn: TBitBtn
      Left = 343
      Top = 10
      Width = 100
      Height = 25
      Caption = #23384#20026'Txt'#26684#24335
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 6
      OnClick = TxtBtnClick
    end
  end
  object StatusBar1: TStatusBar
    Left = 0
    Top = 440
    Width = 602
    Height = 19
    Panels = <
      item
        Alignment = taCenter
        Text = #25552#31034#65306
        Width = 50
      end
      item
        Text = #25104#32489#20026'-1'#34920#31034#32570#32771#32771#29983
        Width = 50
      end>
  end
  object DataSource1: TDataSource
    DataSet = ClientDataSet1
    Left = 183
    Top = 128
  end
  object PopupMenu1: TPopupMenu
    Left = 256
    Top = 176
    object N5: TMenuItem
      Caption = #35774#20026#32771#23436#20132#21367
      Enabled = False
      Visible = False
      OnClick = N5Click
    end
    object N1: TMenuItem
      Caption = #35774#20026#25277#39064#37325#32771
      Enabled = False
      Visible = False
      OnClick = N1Click
    end
    object N2: TMenuItem
      Caption = #35774#20026#25442#26426#32487#32771
      Enabled = False
      Visible = False
      OnClick = N2Click
    end
    object N4: TMenuItem
      Caption = #35774#20026#33310#24330
      Enabled = False
      Visible = False
      OnClick = N4Click
    end
    object N3: TMenuItem
      Caption = '-'
      Visible = False
    end
    object OutToTxt: TMenuItem
      Caption = #25104#32489#23548#20986#33267#25991#26412#25991#20214
      Visible = False
      object CY_CJ: TMenuItem
        Caption = #28145#22323#30005#22823#27531#30142#20154#23398#38498#26684#24335
        OnClick = CY_CJClick
      end
      object SZDD_CJ: TMenuItem
        Caption = #28145#22323#30005#22823#26684#24335
        OnClick = SZDD_CJClick
      end
    end
    object N6: TMenuItem
      Caption = #25104#32489#23548#20986#33267'Excel'#26684#24335
      OnClick = N6Click
    end
    object N7: TMenuItem
      Caption = #25104#32489#23548#20986#33267#32431#25991#26412#26684#24335
      OnClick = N7Click
    end
  end
  object SaveDialog1: TSaveDialog
    DefaultExt = '*.xls'
    FileName = #32771#29983#25104#32489'.xls'
    Filter = 'Excel '#25991#20214'(*.xls)|*.xls|'#25991#26412#25991#20214'(*.txt)|*.txt'
    FilterIndex = 0
    Left = 296
    Top = 176
  end
  object ClientDataSet1: TClientDataSet
    Aggregates = <>
    CommandText = 
      'select xs.'#23398#21495',xs.'#22995#21517',xs.'#38498#31995',xs.'#19987#19994',xs.'#29677#32423',CASE WHEN ks.'#32771#35797#29366#24577' IS NULL T' +
      'HEN - 1 ELSE ks.'#25104#32489' END AS as '#25104#32489',ks.'#32771#35797#29366#24577',kd.* from '#32771#29983#20449#24687#34920' xs left ' +
      'join '#32771#29983#32771#35797#34920' ks on ks.'#23398#21495'=xs.'#23398#21495' left join '#32771#28857#20449#24687#34920' kd on kd.'#32771#28857#20195#30721'=xs.'#25152#23646 +
      #32771#28857
    Params = <>
    ProviderName = 'Srv_DataSetProvider'
    RemoteServer = RDataForm.MyConnection
    AfterPost = ClientDataSet1AfterPost
    OnCalcFields = ClientDataSet1CalcFields
    Left = 152
    Top = 128
    object ClientDataSet1IntegerField: TIntegerField
      FieldKind = fkCalculated
      FieldName = #24207#21495
      Calculated = True
    end
    object ClientDataSet1CDSDesigner: TStringField
      FieldName = #23398#21495
      Size = 8
    end
    object ClientDataSet1CDSDesigner2: TStringField
      FieldName = #22995#21517
      Size = 8
    end
    object ClientDataSet1CDSDesigner3: TBCDField
      FieldName = #25104#32489
      Precision = 18
      Size = 1
    end
    object ClientDataSet1CDSDesigner4: TStringField
      FieldName = #32771#35797#29366#24577
      Size = 8
    end
    object ClientDataSet1CDSDesigner5: TStringField
      FieldName = #32771#28857#20195#30721
      Size = 10
    end
    object ClientDataSet1CDSDesigner6: TStringField
      FieldName = #32771#28857#21517#31216
      Size = 50
    end
    object ClientDataSet1CDSDesigner7: TStringField
      FieldName = #35797#21367#21495
      Size = 10
    end
    object ClientDataSet1CDSDesigner8: TStringField
      FieldName = #32771#35797#20195#30721
      Size = 10
    end
    object ClientDataSet1CDSDesigner9: TStringField
      FieldName = #29366#24577
      Size = 10
    end
    object ClientDataSet1CDSDesigner10: TStringField
      FieldName = #38498#31995
    end
    object ClientDataSet1CDSDesigner11: TStringField
      FieldName = #19987#19994
      Size = 30
    end
    object ClientDataSet1CDSDesigner12: TStringField
      FieldName = #29677#32423
      Size = 50
    end
  end
  object ClientDataSet2: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'Update_DataSetProvider'
    RemoteServer = RDataForm.MyConnection
    AfterPost = ClientDataSet1AfterPost
    Left = 232
    Top = 128
  end
end
